From: Chong Yidong Date: Fri, 11 Apr 2008 02:30:24 +0000 (+0000) Subject: (woman2-TH): Undo last change. Use string-equal instead of X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~22471 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=532a0f4c95ef7773e706044552b69bed77c7816b;p=emacs.git (woman2-TH): Undo last change. Use string-equal instead of string-match. --- diff --git a/lisp/woman.el b/lisp/woman.el index 9f47329fd3b..72fa4574acf 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -3846,7 +3846,7 @@ v alters page foot left; m alters page head center. (insert " -- ") (woman-forward-arg 'unquote 'concat) ;; Delete repeated arguments: - (if (string-match (regexp-quote (buffer-substring here (point))) + (if (string-equal (buffer-substring here (point)) (buffer-substring start here)) (delete-region here (point))))) ;; Embolden heading (point is at end of heading):